﻿Public Class frmContacts
    Private Sub cmdAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdAdd.Click
        Dim frm As New frmEditContact()
        If (frm.ShowDialog() = Windows.Forms.DialogResult.OK) Then

        End If
    End Sub

    Private Sub cmdEdit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdEdit.Click
        Dim frm As New frmEditContact()
        If (frm.ShowDialog() = Windows.Forms.DialogResult.OK) Then

        End If
    End Sub
End Class